/ Time Gal / Time Gal.iso / movie / C2 / C2.rsrc / VWAC_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 6f 02 01 00 00 03 01 | 00 61 04 01 02 92 05 01 |.o......|.a......|
|00000010| 02 c7 06 01 02 cc 07 01 | 03 0c 08 01 03 f1 09 01 |........|........|
|00000020| 04 2b 0a 01 05 b0 0b 01 | 06 1f 0c 01 06 40 0d 01 |.+......|.....@..|
|00000030| 06 ad 0e 01 07 03 0f 01 | 07 1a 10 01 08 14 11 01 |........|........|
|00000040| 09 43 12 01 09 bf 13 01 | 0a ee 14 01 0b 7a 15 01 |.C......|.....z..|
|00000050| 0c b1 16 01 0d 20 17 01 | 0d 8e 18 01 0d fc 19 01 |..... ..|........|
|00000060| 0e 85 1a 01 0f 7f 00 00 | 10 ad 1b 01 10 ad 1c 01 |........|........|
|00000070| 11 ed 1d 01 12 9a 1e 01 | 13 09 1f 01 13 77 20 01 |........|.....w .|
|00000080| 13 e5 00 00 15 aa 21 01 | 15 aa 22 01 15 c4 23 01 |......!.|.."...#.|
|00000090| 16 be 24 01 17 f4 00 00 | 18 6f 25 01 18 6f 26 01 |..$.....|.o%..o&.|
|000000a0| 19 2f 27 01 1a 28 28 01 | 1a a3 29 01 1b 9d 2a 01 |./'..((.|..)...*.|
|000000b0| 1c 0b 2b 01 1c 79 2c 01 | 1c fa 2d 01 1d b0 2e 01 |..+..y,.|..-.....|
|000000c0| 1e 67 2f 01 1f 1e 00 00 | 1f d4 00 00 1f d4 00 00 |.g/.....|........|
|000000d0| 1f d4 00 00 1f d4 00 00 | 1f d4 00 00 1f d4 00 00 |........|........|
|000000e0| 1f d4 30 01 1f d4 00 00 | 20 d5 31 01 20 d5 32 01 |..0.....| .1. .2.|
|000000f0| 21 d4 33 01 21 f8 00 00 | 22 19 00 00 22 19 34 01 |!.3.!...|"...".4.|
|00000100| 22 19 00 00 22 92 00 00 | 22 92 35 01 22 92 00 00 |"..."...|".5."...|
|00000110| 23 0b 36 01 23 0b 00 00 | 23 32 00 00 23 32 00 00 |#.6.#...|#2..#2..|
|00000120| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000130| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000140| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000150| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000160| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000170| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000180| 23 32 00 00 23 32 00 00 | 23 32 00 00 23 32 00 00 |#2..#2..|#2..#2..|
|00000190| 23 32 00 00 23 32 37 01 | 23 32 00 00 24 36 00 00 |#2..#27.|#2..$6..|
|000001a0| 24 36 38 01 24 36 00 00 | 24 c3 00 00 24 c3 00 00 |$68.$6..|$...$...|
|000001b0| 24 c3 00 00 24 c3 00 00 | 24 c3 39 01 24 c3 3d 00 |$...$...|$.9.$.=.|
|000001c0| 25 a8 67 6c 6f 62 61 6c | 20 70 6c 61 79 65 72 0d |%.global| player.|
|000001d0| 0d 70 75 74 20 70 6c 61 | 79 65 72 20 69 6e 74 6f |.put pla|yer into|
|000001e0| 20 70 6c 79 0d 70 75 74 | 20 73 74 72 69 6e 67 28 | ply.put| string(|
|000001f0| 70 6c 79 29 20 69 6e 74 | 6f 20 70 6c 61 79 65 72 |ply) int|o player|
|00000200| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|00000210| 20 63 61 73 74 20 41 34 | 34 20 3d 20 70 6c 61 79 | cast A4|4 = play|
|00000220| 65 72 0d 67 6c 6f 62 61 | 6c 20 70 75 73 68 74 2c |er.globa|l pusht,|
|00000230| 70 75 73 68 70 2c 73 63 | 6f 72 65 2c 68 61 6c 66 |pushp,sc|ore,half|
|00000240| 2c 6c 65 76 65 6c 0d 0d | 69 66 20 68 61 6c 66 20 |,level..|if half |
|00000250| 3d 20 30 20 74 68 65 6e | 0d 20 20 20 20 69 66 20 |= 0 then|.    if |
|00000260| 6c 65 76 65 6c 20 3d 20 | 22 65 61 73 79 22 20 74 |level = |"easy" t|
|00000270| 68 65 6e 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |hen put |integer(|
|00000280| 31 30 30 30 20 2b 20 73 | 63 6f 72 65 29 20 69 6e |1000 + s|core) in|
|00000290| 74 6f 20 67 65 74 0d 20 | 20 20 20 69 66 20 6c 65 |to get. |   if le|
|000002a0| 76 65 6c 20 3d 20 22 6e | 6f 72 6d 61 6c 22 20 74 |vel = "n|ormal" t|
|000002b0| 68 65 6e 20 70 75 74 20 | 69 6e 74 65 67 65 72 28 |hen put |integer(|
|000002c0| 31 35 30 30 20 2b 20 73 | 63 6f 72 65 29 20 69 6e |1500 + s|core) in|
|000002d0| 74 6f 20 67 65 74 0d 20 | 20 20 20 69 66 20 6c 65 |to get. |   if le|
|000002e0| 76 65 6c 20 3d 20 22 68 | 61 72 64 22 20 74 68 65 |vel = "h|ard" the|
|000002f0| 6e 20 70 75 74 20 69 6e | 74 65 67 65 72 28 32 30 |n put in|teger(20|
|00000300| 30 30 20 2b 20 73 63 6f | 72 65 29 20 69 6e 74 6f |00 + sco|re) into|
|00000310| 20 67 65 74 0d 20 20 20 | 20 65 6c 73 65 20 6e 6f | get.   | else no|
|00000320| 74 68 69 6e 67 0d 65 6c | 73 65 0d 20 20 20 20 69 |thing.el|se.    i|
|00000330| 66 20 6c 65 76 65 6c 20 | 3d 20 22 65 61 73 79 22 |f level |= "easy"|
|00000340| 20 74 68 65 6e 20 70 75 | 74 20 69 6e 74 65 67 65 | then pu|t intege|
|00000350| 72 28 35 30 30 20 2b 20 | 73 63 6f 72 65 29 20 69 |r(500 + |score) i|
|00000360| 6e 74 6f 20 67 65 74 0d | 20 20 20 20 69 66 20 6c |nto get.|    if l|
|00000370| 65 76 65 6c 20 3d 20 22 | 6e 6f 72 6d 61 6c 22 20 |evel = "|normal" |
|00000380| 74 68 65 6e 20 70 75 74 | 20 69 6e 74 65 67 65 72 |then put| integer|
|00000390| 28 31 30 30 30 20 2b 20 | 73 63 6f 72 65 29 20 69 |(1000 + |score) i|
|000003a0| 6e 74 6f 20 67 65 74 0d | 20 20 20 20 69 66 20 6c |nto get.|    if l|
|000003b0| 65 76 65 6c 20 3d 20 22 | 68 61 72 64 22 20 74 68 |evel = "|hard" th|
|000003c0| 65 6e 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 31 |en put i|nteger(1|
|000003d0| 35 30 30 20 2b 20 73 63 | 6f 72 65 29 20 69 6e 74 |500 + sc|ore) int|
|000003e0| 6f 20 67 65 74 0d 65 6e | 64 20 69 66 0d 0d 70 75 |o get.en|d if..pu|
|000003f0| 74 20 73 74 72 69 6e 67 | 28 67 65 74 29 20 69 6e |t string|(get) in|
|00000400| 74 6f 20 73 63 6f 72 65 | 0d 73 65 74 20 74 68 65 |to score|.set the|
|00000410| 20 74 65 78 74 20 6f 66 | 20 63 61 73 74 20 22 73 | text of| cast "s|
|00000420| 63 6f 72 65 22 20 3d 20 | 73 63 6f 72 65 0d 0d 70 |core" = |score..p|
|00000430| 75 74 20 30 20 69 6e 74 | 6f 20 70 75 73 68 74 0d |ut 0 int|o pusht.|
|00000440| 70 75 74 20 22 22 20 69 | 6e 74 6f 20 70 75 73 68 |put "" i|nto push|
|00000450| 70 0d 0d 0d 2d 2d 8d b6 | 82 aa 90 b3 89 f0 0d 67 |p...--..|.......g|
|00000460| 6c 6f 62 61 6c 20 6c 65 | 76 65 6c 0d 0d 6a 75 64 |lobal le|vel..jud|
|00000470| 67 65 28 41 31 32 2c 22 | 6c 65 66 74 22 2c 22 65 |ge(A12,"|left","e|
|00000480| 31 22 29 0d 0d 0d 0d 0d | 0d 71 75 69 74 0d 73 65 |1").....|.quit.se|
|00000490| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 73 70 |t the ty|pe of sp|
|000004a0| 72 69 74 65 20 38 20 3d | 20 31 36 0d 73 65 74 20 |rite 8 =| 16.set |
|000004b0| 74 68 65 20 6d 6f 76 69 | 65 72 61 74 65 20 6f 66 |the movi|erate of|
|000004c0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 0d 67 6c | sprite |8 = 1.gl|
|000004d0| 6f 62 61 6c 20 70 75 73 | 68 74 2c 70 75 73 68 70 |obal pus|ht,pushp|
|000004e0| 0d 73 65 74 20 74 68 65 | 20 74 79 70 65 20 6f 66 |.set the| type of|
|000004f0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 36 0d 73 | sprite |8 = 16.s|
|00000500| 65 74 20 74 68 65 20 6d | 6f 76 69 65 72 61 74 65 |et the m|ovierate|
|00000510| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00000520| 0d 0d 69 66 20 74 68 65 | 20 6d 6f 76 69 65 74 69 |..if the| movieti|
|00000530| 6d 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3c |me of sp|rite 8 <|
|00000540| 20 74 68 65 20 64 75 72 | 61 74 69 6f 6e 20 6f 66 | the dur|ation of|
|00000550| 20 63 61 73 74 20 42 31 | 31 20 74 68 65 6e 0d 20 | cast B1|1 then. |
|00000560| 20 20 20 67 6f 20 74 68 | 65 20 66 72 61 6d 65 0d |   go th|e frame.|
|00000570| 65 6c 73 65 0d 20 20 20 | 20 67 6f 20 74 6f 20 22 |else.   | go to "|
|00000580| 72 6f 6f 64 61 22 0d 65 | 6e 64 20 69 66 0d 0d 0d |rooda".e|nd if...|
|00000590| 70 75 74 20 30 20 69 6e | 74 6f 20 70 75 73 68 74 |put 0 in|to pusht|
|000005a0| 0d 70 75 74 20 22 22 20 | 69 6e 74 6f 20 70 75 73 |.put "" |into pus|
|000005b0| 68 70 0d 67 6c 6f 62 61 | 6c 20 73 63 6f 72 65 0d |hp.globa|l score.|
|000005c0| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|000005d0| 63 61 73 74 20 22 73 63 | 6f 72 65 22 20 3d 20 73 |cast "sc|ore" = s|
|000005e0| 74 72 69 6e 67 28 73 63 | 6f 72 65 29 0d 67 6c 6f |tring(sc|ore).glo|
|000005f0| 62 61 6c 20 70 75 73 68 | 74 2c 70 75 73 68 70 2c |bal push|t,pushp,|
|00000600| 68 61 6c 66 2c 73 63 6f | 72 65 2c 70 6c 61 79 65 |half,sco|re,playe|
|00000610| 72 0d 0d 69 66 20 28 28 | 68 61 6c 66 20 3d 20 30 |r..if ((|half = 0|
|00000620| 29 20 61 6e 64 20 28 70 | 6c 61 79 65 72 20 3c 3d |) and (p|layer <=|
|00000630| 20 35 29 29 20 74 68 65 | 6e 20 0d 20 20 20 20 70 | 5)) the|n .    p|
|00000640| 75 74 20 69 6e 74 65 67 | 65 72 28 70 6c 61 79 65 |ut integ|er(playe|
|00000650| 72 20 2b 20 31 29 20 69 | 6e 74 6f 20 70 6c 61 79 |r + 1) i|nto play|
|00000660| 65 72 0d 65 6e 64 20 69 | 66 0d 0d 2d 2d 83 7b 81 |er.end i|f..--.{.|
|00000670| 5b 83 69 83 58 0d 69 66 | 20 68 61 6c 66 20 3d 20 |[.i.X.if| half = |
|00000680| 30 20 74 68 65 6e 20 0d | 20 20 20 20 70 75 74 20 |0 then .|    put |
|00000690| 69 6e 74 65 67 65 72 28 | 31 30 30 30 30 20 2b 20 |integer(|10000 + |
|000006a0| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|000006b0| 65 6c 73 65 0d 20 20 20 | 20 70 75 74 20 69 6e 74 |else.   | put int|
|000006c0| 65 67 65 72 28 35 30 30 | 30 20 2b 20 73 63 6f 72 |eger(500|0 + scor|
|000006d0| 65 29 20 69 6e 74 6f 20 | 67 65 74 0d 65 6e 64 20 |e) into |get.end |
|000006e0| 69 66 0d 70 75 74 20 73 | 74 72 69 6e 67 28 67 65 |if.put s|tring(ge|
|000006f0| 74 29 20 69 6e 74 6f 20 | 73 63 6f 72 65 0d 73 65 |t) into |score.se|
|00000700| 74 20 74 68 65 20 74 65 | 78 74 20 6f 66 20 63 61 |t the te|xt of ca|
|00000710| 73 74 20 22 73 63 6f 72 | 65 22 20 3d 20 73 63 6f |st "scor|e" = sco|
|00000720| 72 65 0d 0d 2d 2d 96 94 | 81 41 8f 89 8a fa 92 6c |re..--..|.A.....l|
|00000730| 82 c9 96 df 82 b5 82 c4 | 82 a8 82 ad 0d 70 75 74 |........|.....put|
|00000740| 20 30 20 69 6e 74 6f 20 | 70 75 73 68 74 0d 70 75 | 0 into |pusht.pu|
|00000750| 74 20 22 22 20 69 6e 74 | 6f 20 70 75 73 68 70 0d |t "" int|o pushp.|
|00000760| 70 75 74 20 30 20 69 6e | 74 6f 20 68 61 6c 66 0d |put 0 in|to half.|
|00000770| 0d 0d 69 66 20 74 68 65 | 20 6d 6f 76 69 65 74 69 |..if the| movieti|
|00000780| 6d 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3c |me of sp|rite 8 <|
|00000790| 20 74 68 65 20 64 75 72 | 61 74 69 6f 6e 20 6f 66 | the dur|ation of|
|000007a0| 20 63 61 73 74 20 41 32 | 35 20 74 68 65 6e 20 0d | cast A2|5 then .|
|000007b0| 20 20 20 20 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |    go t|o frame |
|000007c0| 34 30 0d 65 6c 73 65 0d | 20 20 20 20 67 6f 20 74 |40.else.|    go t|
|000007d0| 6f 20 22 6a 74 73 37 22 | 0d 65 6e 64 20 69 66 0d |o "jts7"|.end if.|
|000007e0| 0d 2d 2d 89 ba 82 aa 90 | b3 89 f0 0d 6a 75 64 67 |.--.....|....judg|
|000007f0| 65 28 41 31 35 2c 22 64 | 6f 77 6e 22 2c 22 65 34 |e(A15,"d|own","e4|
|00000800| 22 29 67 6c 6f 62 61 6c | 20 4d 56 63 6f 75 6e 74 |")global| MVcount|
|00000810| 2c 4c 0d 0d 75 6e 6c 6f | 61 64 0d 0d 70 75 74 20 |,L..unlo|ad..put |
|00000820| 69 6e 74 65 67 65 72 28 | 4d 56 63 6f 75 6e 74 20 |integer(|MVcount |
|00000830| 2b 20 31 29 20 69 6e 74 | 6f 20 4d 56 63 6f 75 6e |+ 1) int|o MVcoun|
|00000840| 74 0d 70 75 74 20 31 20 | 69 6e 74 6f 20 4c 0d 0d |t.put 1 |into L..|
|00000850| 67 6f 20 74 6f 20 22 73 | 65 63 6f 6e 64 22 20 6f |go to "s|econd" o|
|00000860| 66 20 6d 6f 76 69 65 20 | 22 6d 61 69 6e 22 0d 67 |f movie |"main".g|
|00000870| 6c 6f 62 61 6c 20 6c 65 | 76 65 6c 0d 0d 69 66 20 |lobal le|vel..if |
|00000880| 6c 65 76 65 6c 20 3d 20 | 22 6e 6f 72 6d 61 6c 22 |level = |"normal"|
|00000890| 20 74 68 65 6e 20 67 6f | 20 74 6f 20 22 74 73 35 | then go| to "ts5|
|000008a0| 22 0d 69 66 20 6c 65 76 | 65 6c 20 3d 20 22 68 61 |".if lev|el = "ha|
|000008b0| 72 64 22 20 74 68 65 6e | 20 67 6f 20 74 6f 20 22 |rd" then| go to "|
|000008c0| 74 73 33 22 0d 75 6e 6c | 6f 61 64 0d 0d 70 72 65 |ts3".unl|oad..pre|
|000008d0| 6c 6f 61 64 20 39 2c 31 | 30 35 0d 0d 67 6c 6f 62 |load 9,1|05..glob|
|000008e0| 61 6c 20 70 75 73 68 74 | 2c 70 75 73 68 70 2c 68 |al pusht|,pushp,h|
|000008f0| 61 6c 66 0d 73 65 74 20 | 74 68 65 20 74 79 70 65 |alf.set |the type|
|00000900| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00000910| 36 0d 73 65 74 20 74 68 | 65 20 6d 6f 76 69 65 72 |6.set th|e movier|
|00000920| 61 74 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ate of s|prite 8 |
|00000930| 3d 20 31 0d 0d 69 66 20 | 74 68 65 20 6d 6f 76 69 |= 1..if |the movi|
|00000940| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|00000950| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|00000960| 20 6f 66 20 63 61 73 74 | 20 42 31 34 20 74 68 65 | of cast| B14 the|
|00000970| 6e 0d 20 20 20 20 67 6f | 20 74 68 65 20 66 72 61 |n.    go| the fra|
|00000980| 6d 65 0d 65 6c 73 65 0d | 20 20 20 20 67 6f 20 74 |me.else.|    go t|
|00000990| 6f 20 22 72 6f 6f 64 61 | 22 0d 65 6e 64 20 69 66 |o "rooda|".end if|
|000009a0| 0d 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 70 75 73 |..put 0 |into pus|
|000009b0| 68 74 0d 70 75 74 20 22 | 22 20 69 6e 74 6f 20 70 |ht.put "|" into p|
|000009c0| 75 73 68 70 0d 70 75 74 | 20 31 20 69 6e 74 6f 20 |ushp.put| 1 into |
|000009d0| 68 61 6c 66 0d 0d 67 6c | 6f 62 61 6c 20 70 75 73 |half..gl|obal pus|
|000009e0| 68 70 0d 0d 73 65 74 20 | 74 68 65 20 74 79 70 65 |hp..set |the type|
|000009f0| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3d 20 31 | of spri|te 8 = 1|
|00000a00| 36 0d 73 65 74 20 74 68 | 65 20 6d 6f 76 69 65 72 |6.set th|e movier|
|00000a10| 61 74 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ate of s|prite 8 |
|00000a20| 3d 20 31 0d 69 66 20 70 | 75 73 68 70 20 3d 20 22 |= 1.if p|ushp = "|
|00000a30| 67 6f 6f 64 22 20 74 68 | 65 6e 20 67 6f 20 74 6f |good" th|en go to|
|00000a40| 20 66 72 61 6d 65 20 34 | 30 0d 69 66 20 70 75 73 | frame 4|0.if pus|
|00000a50| 68 70 20 3d 20 22 72 69 | 67 68 74 22 20 74 68 65 |hp = "ri|ght" the|
|00000a60| 6e 20 67 6f 20 74 6f 20 | 66 72 61 6d 65 20 34 32 |n go to |frame 42|
|00000a70| 0d 69 66 20 70 75 73 68 | 70 20 3d 20 22 55 74 75 |.if push|p = "Utu|
|00000a80| 72 6e 22 20 74 68 65 6e | 20 67 6f 20 74 6f 20 66 |rn" then| go to f|
|00000a90| 72 61 6d 65 20 34 34 0d | 0d 69 66 20 74 68 65 20 |rame 44.|.if the |
|00000aa0| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00000ab0| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00000ac0| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 41 32 35 |tion of |cast A25|
|00000ad0| 20 74 68 65 6e 0d 20 20 | 20 20 67 6f 20 74 68 65 | then.  |  go the|
|00000ae0| 20 66 72 61 6d 65 0d 65 | 6c 73 65 0d 20 20 20 20 | frame.e|lse.    |
|00000af0| 67 6f 20 74 6f 20 22 6a | 74 73 37 22 0d 65 6e 64 |go to "j|ts7".end|
|00000b00| 20 69 66 0d 0d 67 6c 6f | 62 61 6c 20 70 75 73 68 | if..glo|bal push|
|00000b10| 70 0d 0d 69 66 20 70 75 | 73 68 70 20 3d 20 22 22 |p..if pu|shp = ""|
|00000b20| 20 74 68 65 6e 20 67 6f | 20 74 6f 20 22 4e 73 6c | then go| to "Nsl|
|00000b30| 63 74 22 0d 69 66 20 70 | 75 73 68 70 20 3d 20 22 |ct".if p|ushp = "|
|00000b40| 72 69 67 68 74 22 20 74 | 68 65 6e 20 67 6f 20 74 |right" t|hen go t|
|00000b50| 6f 20 22 72 69 67 68 74 | 22 0d 69 66 20 70 75 73 |o "right|".if pus|
|00000b60| 68 70 20 3d 20 22 55 74 | 75 72 6e 22 20 74 68 65 |hp = "Ut|urn" the|
|00000b70| 6e 20 67 6f 20 74 6f 20 | 22 55 74 75 72 6e 22 0d |n go to |"Uturn".|
|00000b80| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 70 0d 0d 73 |.global |pushp..s|
|00000b90| 65 74 20 74 68 65 20 74 | 79 70 65 20 6f 66 20 73 |et the t|ype of s|
|00000ba0| 70 72 69 74 65 20 38 20 | 3d 20 31 36 0d 73 65 74 |prite 8 |= 16.set|
|00000bb0| 20 74 68 65 20 6d 6f 76 | 69 65 72 61 74 65 20 6f | the mov|ierate o|
|00000bc0| 66 20 73 70 72 69 74 65 | 20 38 20 3d 20 31 0d 69 |f sprite| 8 = 1.i|
|00000bd0| 66 20 70 75 73 68 70 20 | 3d 20 22 67 6f 6f 64 22 |f pushp |= "good"|
|00000be0| 20 74 68 65 6e 20 67 6f | 20 74 6f 20 66 72 61 6d | then go| to fram|
|00000bf0| 65 20 35 30 0d 69 66 20 | 70 75 73 68 70 20 3d 20 |e 50.if |pushp = |
|00000c00| 22 72 69 67 68 74 22 20 | 74 68 65 6e 20 67 6f 20 |"right" |then go |
|00000c10| 74 6f 20 66 72 61 6d 65 | 20 35 32 0d 69 66 20 70 |to frame| 52.if p|
|00000c20| 75 73 68 70 20 3d 20 22 | 55 74 75 72 6e 22 20 74 |ushp = "|Uturn" t|
|00000c30| 68 65 6e 20 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |hen go t|o frame |
|00000c40| 35 34 0d 0d 69 66 20 74 | 68 65 20 6d 6f 76 69 65 |54..if t|he movie|
|00000c50| 74 69 6d 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |time of |sprite 8|
|00000c60| 20 3c 20 74 68 65 20 64 | 75 72 61 74 69 6f 6e 20 | < the d|uration |
|00000c70| 6f 66 20 63 61 73 74 20 | 41 32 36 20 74 68 65 6e |of cast |A26 then|
|00000c80| 0d 20 20 20 20 67 6f 20 | 74 68 65 20 66 72 61 6d |.    go |the fram|
|00000c90| 65 0d 65 6c 73 65 0d 20 | 20 20 20 67 6f 20 74 6f |e.else. |   go to|
|00000ca0| 20 22 6a 74 73 35 22 0d | 65 6e 64 20 69 66 0d 0d | "jts5".|end if..|
|00000cb0| 73 65 74 20 74 68 65 20 | 74 79 70 65 20 6f 66 20 |set the |type of |
|00000cc0| 73 70 72 69 74 65 20 38 | 20 3d 20 31 36 0d 73 65 |sprite 8| = 16.se|
|00000cd0| 74 20 74 68 65 20 6d 6f | 76 69 65 72 61 74 65 20 |t the mo|vierate |
|00000ce0| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3d 20 31 0d |of sprit|e 8 = 1.|
|00000cf0| 0d 69 66 20 74 68 65 20 | 6d 6f 76 69 65 74 69 6d |.if the |movietim|
|00000d00| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3c 3e |e of spr|ite 8 <>|
|00000d10| 20 74 68 65 20 64 75 72 | 61 74 69 6f 6e 20 6f 66 | the dur|ation of|
|00000d20| 20 63 61 73 74 20 41 33 | 33 20 74 68 65 6e 20 67 | cast A3|3 then g|
|00000d30| 6f 20 74 68 65 20 66 72 | 61 6d 65 0d 67 6c 6f 62 |o the fr|ame.glob|
|00000d40| 61 6c 20 70 75 73 68 74 | 2c 70 75 73 68 70 2c 73 |al pusht|,pushp,s|
|00000d50| 63 6f 72 65 2c 6c 65 76 | 65 6c 0d 0d 69 66 20 6c |core,lev|el..if l|
|00000d60| 65 76 65 6c 20 3d 20 22 | 65 61 73 79 22 20 74 68 |evel = "|easy" th|
|00000d70| 65 6e 20 70 75 74 20 69 | 6e 74 65 67 65 72 28 35 |en put i|nteger(5|
|00000d80| 30 30 20 2b 20 73 63 6f | 72 65 29 20 69 6e 74 6f |00 + sco|re) into|
|00000d90| 20 67 65 74 0d 69 66 20 | 6c 65 76 65 6c 20 3d 20 | get.if |level = |
|00000da0| 22 6e 6f 72 6d 61 6c 22 | 20 74 68 65 6e 20 70 75 |"normal"| then pu|
|00000db0| 74 20 69 6e 74 65 67 65 | 72 28 31 30 30 30 20 2b |t intege|r(1000 +|
|00000dc0| 20 73 63 6f 72 65 29 20 | 69 6e 74 6f 20 67 65 74 | score) |into get|
|00000dd0| 0d 69 66 20 6c 65 76 65 | 6c 20 3d 20 22 68 61 72 |.if leve|l = "har|
|00000de0| 64 22 20 74 68 65 6e 20 | 70 75 74 20 69 6e 74 65 |d" then |put inte|
|00000df0| 67 65 72 28 31 35 30 30 | 20 2b 20 73 63 6f 72 65 |ger(1500| + score|
|00000e00| 29 20 69 6e 74 6f 20 67 | 65 74 0d 0d 70 75 74 20 |) into g|et..put |
|00000e10| 73 74 72 69 6e 67 28 67 | 65 74 29 20 69 6e 74 6f |string(g|et) into|
|00000e20| 20 73 63 6f 72 65 0d 73 | 65 74 20 74 68 65 20 74 | score.s|et the t|
|00000e30| 65 78 74 20 6f 66 20 63 | 61 73 74 20 22 73 63 6f |ext of c|ast "sco|
|00000e40| 72 65 22 20 3d 20 73 63 | 6f 72 65 0d 0d 70 75 74 |re" = sc|ore..put|
|00000e50| 20 30 20 69 6e 74 6f 20 | 70 75 73 68 74 0d 70 75 | 0 into |pusht.pu|
|00000e60| 74 20 22 22 20 69 6e 74 | 6f 20 70 75 73 68 70 0d |t "" int|o pushp.|
|00000e70| 0d 0d 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |...if th|e moviet|
|00000e80| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00000e90| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00000ea0| 66 20 63 61 73 74 20 41 | 32 36 20 74 68 65 6e 20 |f cast A|26 then |
|00000eb0| 0d 20 20 20 20 67 6f 20 | 74 6f 20 66 72 61 6d 65 |.    go |to frame|
|00000ec0| 20 35 30 0d 65 6c 73 65 | 0d 20 20 20 20 67 6f 20 | 50.else|.    go |
|00000ed0| 74 6f 20 22 6a 74 73 35 | 22 0d 65 6e 64 20 69 66 |to "jts5|".end if|
|00000ee0| 0d 0d 69 66 20 74 68 65 | 20 6d 6f 76 69 65 74 69 |..if the| movieti|
|00000ef0| 6d 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3c |me of sp|rite 8 <|
|00000f00| 20 74 68 65 20 64 75 72 | 61 74 69 6f 6e 20 6f 66 | the dur|ation of|
|00000f10| 20 63 61 73 74 20 41 32 | 36 20 74 68 65 6e 20 0d | cast A2|6 then .|
|00000f20| 20 20 20 20 67 6f 20 74 | 6f 20 66 72 61 6d 65 20 |    go t|o frame |
|00000f30| 35 32 0d 65 6c 73 65 0d | 20 20 20 20 67 6f 20 74 |52.else.|    go t|
|00000f40| 6f 20 22 6a 74 73 35 22 | 0d 65 6e 64 20 69 66 0d |o "jts5"|.end if.|
|00000f50| 69 66 20 74 68 65 20 6d | 6f 76 69 65 74 69 6d 65 |if the m|ovietime|
|00000f60| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3c 20 74 | of spri|te 8 < t|
|00000f70| 68 65 20 64 75 72 61 74 | 69 6f 6e 20 6f 66 20 63 |he durat|ion of c|
|00000f80| 61 73 74 20 41 32 36 20 | 74 68 65 6e 20 0d 20 20 |ast A26 |then .  |
|00000f90| 20 20 67 6f 20 74 6f 20 | 66 72 61 6d 65 20 35 34 |  go to |frame 54|
|00000fa0| 0d 65 6c 73 65 0d 20 20 | 20 20 67 6f 20 74 6f 20 |.else.  |  go to |
|00000fb0| 22 6a 74 73 35 22 0d 65 | 6e 64 20 69 66 0d 67 6c |"jts5".e|nd if.gl|
|00000fc0| 6f 62 61 6c 20 70 75 73 | 68 70 0d 0d 2d 2d 67 6f |obal pus|hp..--go|
|00000fd0| 6f 64 82 aa 90 b3 89 f0 | 0d 69 66 20 70 75 73 68 |od......|.if push|
|00000fe0| 70 20 3d 20 22 22 20 74 | 68 65 6e 20 67 6f 20 74 |p = "" t|hen go t|
|00000ff0| 6f 20 22 4e 73 6c 63 74 | 22 0d 69 66 20 70 75 73 |o "Nslct|".if pus|
|00001000| 68 70 20 3d 20 22 72 69 | 67 68 74 22 20 74 68 65 |hp = "ri|ght" the|
|00001010| 6e 20 67 6f 20 74 6f 20 | 22 72 69 67 68 74 22 0d |n go to |"right".|
|00001020| 69 66 20 70 75 73 68 70 | 20 3d 20 22 55 74 75 72 |if pushp| = "Utur|
|00001030| 6e 22 20 74 68 65 6e 20 | 67 6f 20 74 6f 20 22 55 |n" then |go to "U|
|00001040| 74 75 72 6e 22 0d 0d 67 | 6c 6f 62 61 6c 20 70 75 |turn"..g|lobal pu|
|00001050| 73 68 74 2c 70 75 73 68 | 70 2c 68 61 6c 66 0d 73 |sht,push|p,half.s|
|00001060| 65 74 20 74 68 65 20 74 | 79 70 65 20 6f 66 20 73 |et the t|ype of s|
|00001070| 70 72 69 74 65 20 38 20 | 3d 20 31 36 0d 73 65 74 |prite 8 |= 16.set|
|00001080| 20 74 68 65 20 6d 6f 76 | 69 65 72 61 74 65 20 6f | the mov|ierate o|
|00001090| 66 20 73 70 72 69 74 65 | 20 38 20 3d 20 31 0d 0d |f sprite| 8 = 1..|
|000010a0| 69 66 20 74 68 65 20 6d | 6f 76 69 65 74 69 6d 65 |if the m|ovietime|
|000010b0| 20 6f 66 20 73 70 72 69 | 74 65 20 38 20 3c 20 74 | of spri|te 8 < t|
|000010c0| 68 65 20 64 75 72 61 74 | 69 6f 6e 20 6f 66 20 63 |he durat|ion of c|
|000010d0| 61 73 74 20 42 32 32 20 | 74 68 65 6e 20 0d 20 20 |ast B22 |then .  |
|000010e0| 20 20 67 6f 20 74 68 65 | 20 66 72 61 6d 65 0d 65 |  go the| frame.e|
|000010f0| 6c 73 65 0d 20 20 20 20 | 67 6f 20 74 6f 20 22 72 |lse.    |go to "r|
|00001100| 6f 6f 64 61 22 0d 65 6e | 64 20 69 66 0d 0d 70 75 |ooda".en|d if..pu|
|00001110| 74 20 30 20 69 6e 74 6f | 20 70 75 73 68 74 0d 70 |t 0 into| pusht.p|
|00001120| 75 74 20 22 22 20 69 6e | 74 6f 20 70 75 73 68 70 |ut "" in|to pushp|
|00001130| 0d 70 75 74 20 31 20 69 | 6e 74 6f 20 68 61 6c 66 |.put 1 i|nto half|
|00001140| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 70 0d 0d 73 |.global |pushp..s|
|00001150| 65 74 20 74 68 65 20 74 | 79 70 65 20 6f 66 20 73 |et the t|ype of s|
|00001160| 70 72 69 74 65 20 38 20 | 3d 20 31 36 0d 73 65 74 |prite 8 |= 16.set|
|00001170| 20 74 68 65 20 6d 6f 76 | 69 65 72 61 74 65 20 6f | the mov|ierate o|
|00001180| 66 20 73 70 72 69 74 65 | 20 38 20 3d 20 31 0d 69 |f sprite| 8 = 1.i|
|00001190| 66 20 70 75 73 68 70 20 | 3d 20 22 67 6f 6f 64 22 |f pushp |= "good"|
|000011a0| 20 74 68 65 6e 20 67 6f | 20 74 6f 20 66 72 61 6d | then go| to fram|
|000011b0| 65 20 36 30 0d 69 66 20 | 70 75 73 68 70 20 3d 20 |e 60.if |pushp = |
|000011c0| 22 73 68 6f 6f 74 22 20 | 74 68 65 6e 20 67 6f 20 |"shoot" |then go |
|000011d0| 74 6f 20 66 72 61 6d 65 | 20 36 32 0d 69 66 20 70 |to frame| 62.if p|
|000011e0| 75 73 68 70 20 3d 20 22 | 64 6f 77 6e 22 20 74 68 |ushp = "|down" th|
|000011f0| 65 6e 20 67 6f 20 74 6f | 20 66 72 61 6d 65 20 36 |en go to| frame 6|
|00001200| 34 0d 0d 69 66 20 74 68 | 65 20 6d 6f 76 69 65 74 |4..if th|e moviet|
|00001210| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00001220| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00001230| 66 20 63 61 73 74 20 41 | 32 37 20 74 68 65 6e 0d |f cast A|27 then.|
|00001240| 20 20 20 20 67 6f 20 74 | 68 65 20 66 72 61 6d 65 |    go t|he frame|
|00001250| 0d 65 6c 73 65 0d 20 20 | 20 20 67 6f 20 74 6f 20 |.else.  |  go to |
|00001260| 22 6a 74 73 33 22 0d 65 | 6e 64 20 69 66 0d 0d 67 |"jts3".e|nd if..g|
|00001270| 6c 6f 62 61 6c 20 70 6c | 61 79 65 72 2c 72 65 73 |lobal pl|ayer,res|
|00001280| 74 61 72 74 2c 68 61 6c | 66 2c 62 79 65 0d 0d 70 |tart,hal|f,bye..p|
|00001290| 75 74 20 70 6c 61 79 65 | 72 20 69 6e 74 6f 20 70 |ut playe|r into p|
|000012a0| 6c 79 0d 70 75 74 20 73 | 74 72 69 6e 67 28 70 6c |ly.put s|tring(pl|
|000012b0| 79 29 20 69 6e 74 6f 20 | 70 6c 61 79 65 72 0d 73 |y) into |player.s|
|000012c0| 65 74 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 63 |et the t|ext of c|
|000012d0| 61 73 74 20 41 34 34 20 | 3d 20 70 6c 61 79 65 72 |ast A44 |= player|
|000012e0| 0d 0d 69 66 20 72 65 73 | 74 61 72 74 20 3c 3e 20 |..if res|tart <> |
|000012f0| 31 20 74 68 65 6e 20 67 | 6f 20 74 68 65 20 66 72 |1 then g|o the fr|
|00001300| 61 6d 65 0d 0d 69 66 20 | 62 79 65 20 3d 20 31 20 |ame..if |bye = 1 |
|00001310| 74 68 65 6e 0d 20 20 20 | 20 0d 20 20 20 20 70 75 |then.   | .    pu|
|00001320| 70 70 65 74 73 6f 75 6e | 64 20 22 62 79 65 62 79 |ppetsoun|d "byeby|
|00001330| 65 22 0d 20 20 20 20 67 | 6f 20 74 6f 20 22 67 71 |e".    g|o to "gq|
|00001340| 22 0d 20 20 20 20 0d 65 | 6e 64 20 69 66 0d 0d 69 |".    .e|nd if..i|
|00001350| 66 20 28 72 65 73 74 61 | 72 74 20 3d 20 31 29 20 |f (resta|rt = 1) |
|00001360| 61 6e 64 20 28 68 61 6c | 66 20 3d 20 30 29 20 74 |and (hal|f = 0) t|
|00001370| 68 65 6e 20 67 6f 20 74 | 6f 20 22 31 22 0d 69 66 |hen go t|o "1".if|
|00001380| 20 28 72 65 73 74 61 72 | 74 20 3d 20 31 29 20 61 | (restar|t = 1) a|
|00001390| 6e 64 20 28 68 61 6c 66 | 20 3d 20 31 29 20 74 68 |nd (half| = 1) th|
|000013a0| 65 6e 20 67 6f 20 74 6f | 20 22 33 22 0d 0d 0d 67 |en go to| "3"...g|
|000013b0| 6c 6f 62 61 6c 20 70 75 | 73 68 74 2c 70 75 73 68 |lobal pu|sht,push|
|000013c0| 70 2c 73 63 6f 72 65 2c | 68 61 6c 66 0d 0d 73 65 |p,score,|half..se|
|000013d0| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 73 70 |t the ty|pe of sp|
|000013e0| 72 69 74 65 20 38 20 3d | 20 31 36 0d 73 65 74 20 |rite 8 =| 16.set |
|000013f0| 74 68 65 20 6d 6f 76 69 | 65 72 61 74 65 20 6f 66 |the movi|erate of|
|00001400| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 0d 0d 69 | sprite |8 = 1..i|
|00001410| 66 20 74 68 65 20 6d 6f | 76 69 65 74 69 6d 65 20 |f the mo|vietime |
|00001420| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3c 3e 20 74 |of sprit|e 8 <> t|
|00001430| 68 65 20 64 75 72 61 74 | 69 6f 6e 20 6f 66 20 63 |he durat|ion of c|
|00001440| 61 73 74 20 41 31 31 20 | 74 68 65 6e 20 67 6f 20 |ast A11 |then go |
|00001450| 74 68 65 20 66 72 61 6d | 65 0d 0d 0d 69 66 20 74 |the fram|e...if t|
|00001460| 68 65 20 6d 6f 76 69 65 | 74 69 6d 65 20 6f 66 20 |he movie|time of |
|00001470| 73 70 72 69 74 65 20 38 | 20 3c 20 74 68 65 20 64 |sprite 8| < the d|
|00001480| 75 72 61 74 69 6f 6e 20 | 6f 66 20 63 61 73 74 20 |uration |of cast |
|00001490| 41 32 37 20 74 68 65 6e | 20 0d 20 20 20 20 67 6f |A27 then| .    go|
|000014a0| 20 74 6f 20 66 72 61 6d | 65 20 36 30 0d 65 6c 73 | to fram|e 60.els|
|000014b0| 65 0d 20 20 20 20 67 6f | 20 74 6f 20 22 6a 74 73 |e.    go| to "jts|
|000014c0| 33 22 0d 65 6e 64 20 69 | 66 0d 0d 69 66 20 74 68 |3".end i|f..if th|
|000014d0| 65 20 6d 6f 76 69 65 74 | 69 6d 65 20 6f 66 20 73 |e moviet|ime of s|
|000014e0| 70 72 69 74 65 20 38 20 | 3c 20 74 68 65 20 64 75 |prite 8 |< the du|
|000014f0| 72 61 74 69 6f 6e 20 6f | 66 20 63 61 73 74 20 41 |ration o|f cast A|
|00001500| 32 37 20 74 68 65 6e 20 | 0d 20 20 20 20 67 6f 20 |27 then |.    go |
|00001510| 74 6f 20 66 72 61 6d 65 | 20 36 32 0d 65 6c 73 65 |to frame| 62.else|
|00001520| 0d 20 20 20 20 67 6f 20 | 74 6f 20 22 6a 74 73 33 |.    go |to "jts3|
|00001530| 22 0d 65 6e 64 20 69 66 | 0d 69 66 20 74 68 65 20 |".end if|.if the |
|00001540| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00001550| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00001560| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 41 32 37 |tion of |cast A27|
|00001570| 20 74 68 65 6e 20 0d 20 | 20 20 20 67 6f 20 74 6f | then . |   go to|
|00001580| 20 66 72 61 6d 65 20 36 | 34 0d 65 6c 73 65 0d 20 | frame 6|4.else. |
|00001590| 20 20 20 67 6f 20 74 6f | 20 22 6a 74 73 33 22 0d |   go to| "jts3".|
|000015a0| 65 6e 64 20 69 66 0d 67 | 6c 6f 62 61 6c 20 68 61 |end if.g|lobal ha|
|000015b0| 6c 66 2c 70 6c 61 79 65 | 72 2c 72 65 73 74 61 72 |lf,playe|r,restar|
|000015c0| 74 2c 62 79 65 0d 0d 70 | 75 74 20 30 20 69 6e 74 |t,bye..p|ut 0 int|
|000015d0| 6f 20 62 79 65 0d 73 65 | 74 20 74 68 65 20 74 79 |o bye.se|t the ty|
|000015e0| 70 65 20 6f 66 20 73 70 | 72 69 74 65 20 38 20 3d |pe of sp|rite 8 =|
|000015f0| 20 31 36 0d 73 65 74 20 | 74 68 65 20 6d 6f 76 69 | 16.set |the movi|
|00001600| 65 72 61 74 65 20 6f 66 | 20 73 70 72 69 74 65 20 |erate of| sprite |
|00001610| 38 20 3d 20 31 0d 0d 69 | 66 20 74 68 65 20 6d 6f |8 = 1..i|f the mo|
|00001620| 76 69 65 74 69 6d 65 20 | 6f 66 20 73 70 72 69 74 |vietime |of sprit|
|00001630| 65 20 38 20 3c 20 74 68 | 65 20 64 75 72 61 74 69 |e 8 < th|e durati|
|00001640| 6f 6e 20 6f 66 20 63 61 | 73 74 20 42 32 35 20 74 |on of ca|st B25 t|
|00001650| 68 65 6e 0d 20 20 20 20 | 67 6f 20 74 68 65 20 66 |hen.    |go the f|
|00001660| 72 61 6d 65 0d 65 6c 73 | 65 0d 20 20 20 20 70 75 |rame.els|e.    pu|
|00001670| 74 20 30 20 69 6e 74 6f | 20 72 65 73 74 61 72 74 |t 0 into| restart|
|00001680| 0d 20 20 20 20 70 75 74 | 20 69 6e 74 65 67 65 72 |.    put| integer|
|00001690| 28 70 6c 61 79 65 72 20 | 2d 20 31 29 20 69 6e 74 |(player |- 1) int|
|000016a0| 6f 20 70 6c 61 79 65 72 | 0d 20 20 20 20 70 75 74 |o player|.    put|
|000016b0| 20 22 41 2e 44 2e 32 30 | 30 31 22 20 69 6e 74 6f | "A.D.20|01" into|
|000016c0| 20 6d 73 0d 20 20 20 20 | 70 75 74 20 73 74 72 69 | ms.    |put stri|
|000016d0| 6e 67 28 6d 73 29 20 69 | 6e 74 6f 20 6d 73 67 0d |ng(ms) i|nto msg.|
|000016e0| 20 20 20 20 73 65 74 20 | 74 68 65 20 74 65 78 74 |    set |the text|
|000016f0| 20 6f 66 20 63 61 73 74 | 20 41 35 37 20 3d 20 6d | of cast| A57 = m|
|00001700| 73 67 0d 20 20 20 20 69 | 66 20 70 6c 61 79 65 72 |sg.    i|f player|
|00001710| 20 3e 20 30 20 74 68 65 | 6e 20 0d 20 20 20 20 20 | > 0 the|n .     |
|00001720| 20 20 20 67 6f 20 74 6f | 20 22 72 65 73 74 61 72 |   go to| "restar|
|00001730| 74 22 0d 20 20 20 20 65 | 6c 73 65 0d 20 20 20 20 |t".    e|lse.    |
|00001740| 20 20 20 20 67 6f 20 74 | 6f 20 22 67 61 6d 65 6f |    go t|o "gameo|
|00001750| 76 65 72 22 0d 20 20 20 | 20 65 6e 64 20 69 66 0d |ver".   | end if.|
|00001760| 65 6e 64 20 69 66 0d 0d | 0d 0d 0d 0d 67 6f 20 74 |end if..|....go t|
|00001770| 6f 20 6d 6f 76 69 65 20 | 22 67 61 6d 65 2e 6f 76 |o movie |"game.ov|
|00001780| 65 72 22 0d 0d 0d 67 6c | 6f 62 61 6c 20 70 75 73 |er"...gl|obal pus|
|00001790| 68 74 2c 70 75 73 68 70 | 2c 68 61 6c 66 0d 73 65 |ht,pushp|,half.se|
|000017a0| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 73 70 |t the ty|pe of sp|
|000017b0| 72 69 74 65 20 38 20 3d | 20 31 36 0d 73 65 74 20 |rite 8 =| 16.set |
|000017c0| 74 68 65 20 6d 6f 76 69 | 65 72 61 74 65 20 6f 66 |the movi|erate of|
|000017d0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 0d 0d 69 | sprite |8 = 1..i|
|000017e0| 66 20 74 68 65 20 6d 6f | 76 69 65 74 69 6d 65 20 |f the mo|vietime |
|000017f0| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3c 20 74 68 |of sprit|e 8 < th|
|00001800| 65 20 64 75 72 61 74 69 | 6f 6e 20 6f 66 20 63 61 |e durati|on of ca|
|00001810| 73 74 20 42 32 33 20 74 | 68 65 6e 20 0d 20 20 20 |st B23 t|hen .   |
|00001820| 20 67 6f 20 74 68 65 20 | 66 72 61 6d 65 0d 65 6c | go the |frame.el|
|00001830| 73 65 0d 20 20 20 20 67 | 6f 20 74 6f 20 22 72 6f |se.    g|o to "ro|
|00001840| 6f 64 61 22 0d 65 6e 64 | 20 69 66 0d 0d 70 75 74 |oda".end| if..put|
|00001850| 20 30 20 69 6e 74 6f 20 | 70 75 73 68 74 0d 70 75 | 0 into |pusht.pu|
|00001860| 74 20 22 22 20 69 6e 74 | 6f 20 70 75 73 68 70 0d |t "" int|o pushp.|
|00001870| 70 75 74 20 31 20 69 6e | 74 6f 20 68 61 6c 66 0d |put 1 in|to half.|
|00001880| 67 6c 6f 62 61 6c 20 70 | 75 73 68 74 2c 70 75 73 |global p|usht,pus|
|00001890| 68 70 2c 73 63 6f 72 65 | 2c 6c 65 76 65 6c 0d 0d |hp,score|,level..|
|000018a0| 69 66 20 6c 65 76 65 6c | 20 3d 20 22 65 61 73 79 |if level| = "easy|
|000018b0| 22 20 74 68 65 6e 20 70 | 75 74 20 69 6e 74 65 67 |" then p|ut integ|
|000018c0| 65 72 28 35 30 30 20 2b | 20 73 63 6f 72 65 29 20 |er(500 +| score) |
|000018d0| 69 6e 74 6f 20 67 65 74 | 0d 69 66 20 6c 65 76 65 |into get|.if leve|
|000018e0| 6c 20 3d 20 22 6e 6f 72 | 6d 61 6c 22 20 74 68 65 |l = "nor|mal" the|
|000018f0| 6e 20 70 75 74 20 69 6e | 74 65 67 65 72 28 31 30 |n put in|teger(10|
|00001900| 30 30 20 2b 20 73 63 6f | 72 65 29 20 69 6e 74 6f |00 + sco|re) into|
|00001910| 20 67 65 74 0d 69 66 20 | 6c 65 76 65 6c 20 3d 20 | get.if |level = |
|00001920| 22 68 61 72 64 22 20 74 | 68 65 6e 20 70 75 74 20 |"hard" t|hen put |
|00001930| 69 6e 74 65 67 65 72 28 | 31 35 30 30 20 2b 20 73 |integer(|1500 + s|
|00001940| 63 6f 72 65 29 20 69 6e | 74 6f 20 67 65 74 0d 0d |core) in|to get..|
|00001950| 70 75 74 20 73 74 72 69 | 6e 67 28 67 65 74 29 20 |put stri|ng(get) |
|00001960| 69 6e 74 6f 20 73 63 6f | 72 65 0d 73 65 74 20 74 |into sco|re.set t|
|00001970| 68 65 20 74 65 78 74 20 | 6f 66 20 63 61 73 74 20 |he text |of cast |
|00001980| 22 73 63 6f 72 65 22 20 | 3d 20 73 63 6f 72 65 0d |"score" |= score.|
|00001990| 0d 70 75 74 20 30 20 69 | 6e 74 6f 20 70 75 73 68 |.put 0 i|nto push|
|000019a0| 74 0d 70 75 74 20 22 22 | 20 69 6e 74 6f 20 70 75 |t.put ""| into pu|
|000019b0| 73 68 70 0d 0d 0d 67 6c | 6f 62 61 6c 20 70 75 73 |shp...gl|obal pus|
|000019c0| 68 70 0d 0d 69 66 20 28 | 74 68 65 20 6d 6f 76 69 |hp..if (|the movi|
|000019d0| 65 74 69 6d 65 20 6f 66 | 20 73 70 72 69 74 65 20 |etime of| sprite |
|000019e0| 38 20 3c 20 74 68 65 20 | 64 75 72 61 74 69 6f 6e |8 < the |duration|
|000019f0| 20 6f 66 20 63 61 73 74 | 20 41 31 36 29 20 61 6e | of cast| A16) an|
|00001a00| 64 20 28 70 75 73 68 70 | 20 3d 20 22 22 29 20 74 |d (pushp| = "") t|
|00001a10| 68 65 6e 0d 20 20 20 20 | 67 6f 20 74 6f 20 66 72 |hen.    |go to fr|
|00001a20| 61 6d 65 20 33 33 0d 65 | 6e 64 20 69 66 0d 0d 0d |ame 33.e|nd if...|
|00001a30| 0d 67 6c 6f 62 61 6c 20 | 6d 73 67 0d 0d 73 65 74 |.global |msg..set|
|00001a40| 20 74 68 65 20 74 79 70 | 65 20 6f 66 20 73 70 72 | the typ|e of spr|
|00001a50| 69 74 65 20 38 20 3d 20 | 31 36 0d 73 65 74 20 74 |ite 8 = |16.set t|
|00001a60| 68 65 20 6d 6f 76 69 65 | 72 61 74 65 20 6f 66 20 |he movie|rate of |
|00001a70| 73 70 72 69 74 65 20 38 | 20 3d 20 31 0d 0d 70 75 |sprite 8| = 1..pu|
|00001a80| 74 20 22 41 2e 44 2e 32 | 30 30 31 22 20 69 6e 74 |t "A.D.2|001" int|
|00001a90| 6f 20 6d 73 0d 70 75 74 | 20 73 74 72 69 6e 67 28 |o ms.put| string(|
|00001aa0| 6d 73 29 20 69 6e 74 6f | 20 6d 73 67 0d 73 65 74 |ms) into| msg.set|
|00001ab0| 20 74 68 65 20 74 65 78 | 74 20 6f 66 20 63 61 73 | the tex|t of cas|
|00001ac0| 74 20 41 35 37 20 3d 20 | 6d 73 67 0d 0d 74 69 6b |t A57 = |msg..tik|
|00001ad0| 61 74 69 6b 61 28 41 31 | 32 2c 38 2c 31 30 30 2c |atika(A1|2,8,100,|
|00001ae0| 35 30 2c 33 30 29 0d 0d | 0d 0d 0d 0d 0d 0d 0d 0d |50,30)..|........|
|00001af0| 0d 67 6c 6f 62 61 6c 20 | 70 75 73 68 74 2c 70 75 |.global |pusht,pu|
|00001b00| 73 68 70 2c 68 61 6c 66 | 0d 73 65 74 20 74 68 65 |shp,half|.set the|
|00001b10| 20 74 79 70 65 20 6f 66 | 20 73 70 72 69 74 65 20 | type of| sprite |
|00001b20| 38 20 3d 20 31 36 0d 73 | 65 74 20 74 68 65 20 6d |8 = 16.s|et the m|
|00001b30| 6f 76 69 65 72 61 74 65 | 20 6f 66 20 73 70 72 69 |ovierate| of spri|
|00001b40| 74 65 20 38 20 3d 20 31 | 0d 0d 69 66 20 74 68 65 |te 8 = 1|..if the|
|00001b50| 20 6d 6f 76 69 65 74 69 | 6d 65 20 6f 66 20 73 70 | movieti|me of sp|
|00001b60| 72 69 74 65 20 38 20 3c | 20 74 68 65 20 64 75 72 |rite 8 <| the dur|
|00001b70| 61 74 69 6f 6e 20 6f 66 | 20 63 61 73 74 20 42 32 |ation of| cast B2|
|00001b80| 34 20 74 68 65 6e 0d 20 | 20 20 20 67 6f 20 74 68 |4 then. |   go th|
|00001b90| 65 20 66 72 61 6d 65 0d | 65 6c 73 65 0d 20 20 20 |e frame.|else.   |
|00001ba0| 20 67 6f 20 74 6f 20 22 | 72 6f 6f 64 61 22 0d 65 | go to "|rooda".e|
|00001bb0| 6e 64 20 69 66 0d 0d 70 | 75 74 20 30 20 69 6e 74 |nd if..p|ut 0 int|
|00001bc0| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|00001bd0| 6e 74 6f 20 70 75 73 68 | 70 0d 70 75 74 20 31 20 |nto push|p.put 1 |
|00001be0| 69 6e 74 6f 20 68 61 6c | 66 0d 67 6c 6f 62 61 6c |into hal|f.global|
|00001bf0| 20 70 75 73 68 70 0d 0d | 69 66 20 28 74 68 65 20 | pushp..|if (the |
|00001c00| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00001c10| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00001c20| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 41 31 33 |tion of |cast A13|
|00001c30| 29 20 61 6e 64 20 28 70 | 75 73 68 70 20 3d 20 22 |) and (p|ushp = "|
|00001c40| 22 29 20 74 68 65 6e 0d | 20 20 20 20 67 6f 20 74 |") then.|    go t|
|00001c50| 6f 20 66 72 61 6d 65 20 | 31 38 0d 65 6e 64 20 69 |o frame |18.end i|
|00001c60| 66 0d 0d 0d 0d 67 6c 6f | 62 61 6c 20 70 75 73 68 |f....glo|bal push|
|00001c70| 74 2c 70 75 73 68 70 2c | 68 61 6c 66 0d 73 65 74 |t,pushp,|half.set|
|00001c80| 20 74 68 65 20 74 79 70 | 65 20 6f 66 20 73 70 72 | the typ|e of spr|
|00001c90| 69 74 65 20 38 20 3d 20 | 31 36 0d 73 65 74 20 74 |ite 8 = |16.set t|
|00001ca0| 68 65 20 6d 6f 76 69 65 | 72 61 74 65 20 6f 66 20 |he movie|rate of |
|00001cb0| 73 70 72 69 74 65 20 38 | 20 3d 20 31 0d 0d 69 66 |sprite 8| = 1..if|
|00001cc0| 20 74 68 65 20 6d 6f 76 | 69 65 74 69 6d 65 20 6f | the mov|ietime o|
|00001cd0| 66 20 73 70 72 69 74 65 | 20 38 20 3c 20 74 68 65 |f sprite| 8 < the|
|00001ce0| 20 64 75 72 61 74 69 6f | 6e 20 6f 66 20 63 61 73 | duratio|n of cas|
|00001cf0| 74 20 42 31 33 20 74 68 | 65 6e 0d 20 20 20 20 67 |t B13 th|en.    g|
|00001d00| 6f 20 74 68 65 20 66 72 | 61 6d 65 0d 65 6c 73 65 |o the fr|ame.else|
|00001d10| 0d 20 20 20 20 67 6f 20 | 74 6f 20 22 72 6f 6f 64 |.    go |to "rood|
|00001d20| 61 22 0d 65 6e 64 20 69 | 66 0d 0d 0d 70 75 74 20 |a".end i|f...put |
|00001d30| 30 20 69 6e 74 6f 20 70 | 75 73 68 74 0d 70 75 74 |0 into p|usht.put|
|00001d40| 20 22 22 20 69 6e 74 6f | 20 70 75 73 68 70 0d 70 | "" into| pushp.p|
|00001d50| 75 74 20 31 20 69 6e 74 | 6f 20 68 61 6c 66 0d 69 |ut 1 int|o half.i|
|00001d60| 66 20 74 68 65 20 6d 6f | 76 69 65 74 69 6d 65 20 |f the mo|vietime |
|00001d70| 6f 66 20 73 70 72 69 74 | 65 20 38 20 3c 20 74 68 |of sprit|e 8 < th|
|00001d80| 65 20 64 75 72 61 74 69 | 6f 6e 20 6f 66 20 63 61 |e durati|on of ca|
|00001d90| 73 74 20 41 32 35 20 74 | 68 65 6e 20 0d 20 20 20 |st A25 t|hen .   |
|00001da0| 20 67 6f 20 74 6f 20 66 | 72 61 6d 65 20 34 32 0d | go to f|rame 42.|
|00001db0| 65 6c 73 65 0d 20 20 20 | 20 67 6f 20 74 6f 20 22 |else.   | go to "|
|00001dc0| 6a 74 73 37 22 0d 65 6e | 64 20 69 66 0d 69 66 20 |jts7".en|d if.if |
|00001dd0| 74 68 65 20 6d 6f 76 69 | 65 74 69 6d 65 20 6f 66 |the movi|etime of|
|00001de0| 20 73 70 72 69 74 65 20 | 38 20 3c 20 74 68 65 20 | sprite |8 < the |
|00001df0| 64 75 72 61 74 69 6f 6e | 20 6f 66 20 63 61 73 74 |duration| of cast|
|00001e00| 20 41 32 35 20 74 68 65 | 6e 20 0d 20 20 20 20 67 | A25 the|n .    g|
|00001e10| 6f 20 74 6f 20 66 72 61 | 6d 65 20 34 34 0d 65 6c |o to fra|me 44.el|
|00001e20| 73 65 0d 20 20 20 20 67 | 6f 20 74 6f 20 22 6a 74 |se.    g|o to "jt|
|00001e30| 73 37 22 0d 65 6e 64 20 | 69 66 0d 67 6c 6f 62 61 |s7".end |if.globa|
|00001e40| 6c 20 70 75 73 68 70 0d | 69 66 20 28 74 68 65 20 |l pushp.|if (the |
|00001e50| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00001e60| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00001e70| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 41 31 32 |tion of |cast A12|
|00001e80| 29 20 61 6e 64 20 28 70 | 75 73 68 70 20 3d 20 22 |) and (p|ushp = "|
|00001e90| 22 20 29 20 20 74 68 65 | 6e 0d 20 20 20 20 67 6f |" )  the|n.    go|
|00001ea0| 20 74 6f 20 20 66 72 61 | 6d 65 20 31 33 0d 65 6e | to  fra|me 13.en|
|00001eb0| 64 20 69 66 0d 0d 0d 0d | 0d 0d 0d 0d 67 6c 6f 62 |d if....|....glob|
|00001ec0| 61 6c 20 6d 73 67 0d 0d | 73 65 74 20 74 68 65 20 |al msg..|set the |
|00001ed0| 74 79 70 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |type of |sprite 8|
|00001ee0| 20 3d 20 31 36 0d 73 65 | 74 20 74 68 65 20 6d 6f | = 16.se|t the mo|
|00001ef0| 76 69 65 72 61 74 65 20 | 6f 66 20 73 70 72 69 74 |vierate |of sprit|
|00001f00| 65 20 38 20 3d 20 31 0d | 0d 70 75 74 20 22 41 2e |e 8 = 1.|.put "A.|
|00001f10| 44 2e 32 30 30 31 22 20 | 69 6e 74 6f 20 6d 73 0d |D.2001" |into ms.|
|00001f20| 70 75 74 20 73 74 72 69 | 6e 67 28 6d 73 29 20 69 |put stri|ng(ms) i|
|00001f30| 6e 74 6f 20 6d 73 67 0d | 73 65 74 20 74 68 65 20 |nto msg.|set the |
|00001f40| 74 65 78 74 20 6f 66 20 | 63 61 73 74 20 41 35 37 |text of |cast A57|
|00001f50| 20 3d 20 6d 73 67 0d 0d | 74 69 6b 61 74 69 6b 61 | = msg..|tikatika|
|00001f60| 28 41 31 33 2c 38 2c 31 | 30 30 2c 35 30 2c 33 30 |(A13,8,1|00,50,30|
|00001f70| 29 0d 67 6c 6f 62 61 6c | 20 6d 73 67 0d 0d 73 65 |).global| msg..se|
|00001f80| 74 20 74 68 65 20 74 79 | 70 65 20 6f 66 20 73 70 |t the ty|pe of sp|
|00001f90| 72 69 74 65 20 38 20 3d | 20 31 36 0d 73 65 74 20 |rite 8 =| 16.set |
|00001fa0| 74 68 65 20 6d 6f 76 69 | 65 72 61 74 65 20 6f 66 |the movi|erate of|
|00001fb0| 20 73 70 72 69 74 65 20 | 38 20 3d 20 31 0d 0d 70 | sprite |8 = 1..p|
|00001fc0| 75 74 20 22 41 2e 44 2e | 32 30 30 31 22 20 69 6e |ut "A.D.|2001" in|
|00001fd0| 74 6f 20 6d 73 0d 70 75 | 74 20 73 74 72 69 6e 67 |to ms.pu|t string|
|00001fe0| 28 6d 73 29 20 69 6e 74 | 6f 20 6d 73 67 0d 73 65 |(ms) int|o msg.se|
|00001ff0| 74 20 74 68 65 20 74 65 | 78 74 20 6f 66 20 63 61 |t the te|xt of ca|
|00002000| 73 74 20 41 35 37 20 3d | 20 6d 73 67 0d 0d 74 69 |st A57 =| msg..ti|
|00002010| 6b 61 74 69 6b 61 28 41 | 31 34 2c 38 2c 31 30 30 |katika(A|14,8,100|
|00002020| 2c 35 30 2c 33 30 29 0d | 0d 67 6c 6f 62 61 6c 20 |,50,30).|.global |
|00002030| 6d 73 67 0d 0d 73 65 74 | 20 74 68 65 20 74 79 70 |msg..set| the typ|
|00002040| 65 20 6f 66 20 73 70 72 | 69 74 65 20 38 20 3d 20 |e of spr|ite 8 = |
|00002050| 31 36 0d 73 65 74 20 74 | 68 65 20 6d 6f 76 69 65 |16.set t|he movie|
|00002060| 72 61 74 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |rate of |sprite 8|
|00002070| 20 3d 20 31 0d 0d 70 75 | 74 20 22 41 2e 44 2e 32 | = 1..pu|t "A.D.2|
|00002080| 30 30 31 22 20 69 6e 74 | 6f 20 6d 73 0d 70 75 74 |001" int|o ms.put|
|00002090| 20 73 74 72 69 6e 67 28 | 6d 73 29 20 69 6e 74 6f | string(|ms) into|
|000020a0| 20 6d 73 67 0d 73 65 74 | 20 74 68 65 20 74 65 78 | msg.set| the tex|
|000020b0| 74 20 6f 66 20 63 61 73 | 74 20 41 35 37 20 3d 20 |t of cas|t A57 = |
|000020c0| 6d 73 67 0d 0d 74 69 6b | 61 74 69 6b 61 28 41 31 |msg..tik|atika(A1|
|000020d0| 35 2c 38 2c 31 30 30 2c | 35 30 2c 33 30 29 0d 0d |5,8,100,|50,30)..|
|000020e0| 67 6c 6f 62 61 6c 20 6d | 73 67 0d 0d 73 65 74 20 |global m|sg..set |
|000020f0| 74 68 65 20 74 79 70 65 | 20 6f 66 20 73 70 72 69 |the type| of spri|
|00002100| 74 65 20 38 20 3d 20 31 | 36 0d 73 65 74 20 74 68 |te 8 = 1|6.set th|
|00002110| 65 20 6d 6f 76 69 65 72 | 61 74 65 20 6f 66 20 73 |e movier|ate of s|
|00002120| 70 72 69 74 65 20 38 20 | 3d 20 31 0d 0d 70 75 74 |prite 8 |= 1..put|
|00002130| 20 22 41 2e 44 2e 32 30 | 30 31 22 20 69 6e 74 6f | "A.D.20|01" into|
|00002140| 20 6d 73 0d 70 75 74 20 | 73 74 72 69 6e 67 28 6d | ms.put |string(m|
|00002150| 73 29 20 69 6e 74 6f 20 | 6d 73 67 0d 73 65 74 20 |s) into |msg.set |
|00002160| 74 68 65 20 74 65 78 74 | 20 6f 66 20 63 61 73 74 |the text| of cast|
|00002170| 20 41 35 37 20 3d 20 6d | 73 67 0d 0d 74 69 6b 61 | A57 = m|sg..tika|
|00002180| 74 69 6b 61 28 41 31 36 | 2c 38 2c 31 30 30 2c 35 |tika(A16|,8,100,5|
|00002190| 30 2c 33 30 29 0d 67 6c | 6f 62 61 6c 20 70 75 73 |0,30).gl|obal pus|
|000021a0| 68 74 2c 70 75 73 68 70 | 2c 73 63 6f 72 65 0d 0d |ht,pushp|,score..|
|000021b0| 2d 2d 6e 6f 72 6d 61 6c | 0d 69 66 20 68 61 6c 66 |--normal|.if half|
|000021c0| 20 3d 20 30 20 74 68 65 | 6e 0d 20 20 20 20 70 75 | = 0 the|n.    pu|
|000021d0| 74 20 69 6e 74 65 67 65 | 72 28 31 30 30 30 30 20 |t intege|r(10000 |
|000021e0| 2b 20 73 63 6f 72 65 29 | 20 69 6e 74 6f 20 67 65 |+ score)| into ge|
|000021f0| 74 0d 65 6c 73 65 0d 20 | 20 20 20 70 75 74 20 69 |t.else. |   put i|
|00002200| 6e 74 65 67 65 72 28 32 | 30 30 30 20 2b 20 73 63 |nteger(2|000 + sc|
|00002210| 6f 72 65 29 20 69 6e 74 | 6f 20 67 65 74 0d 65 6e |ore) int|o get.en|
|00002220| 64 20 69 66 0d 0d 70 75 | 74 20 73 74 72 69 6e 67 |d if..pu|t string|
|00002230| 28 67 65 74 29 20 69 6e | 74 6f 20 73 63 6f 72 65 |(get) in|to score|
|00002240| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|00002250| 20 63 61 73 74 20 22 73 | 63 6f 72 65 22 20 3d 20 | cast "s|core" = |
|00002260| 73 63 6f 72 65 0d 0d 70 | 75 74 20 30 20 69 6e 74 |score..p|ut 0 int|
|00002270| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|00002280| 6e 74 6f 20 70 75 73 68 | 70 0d 0d 67 6f 20 74 6f |nto push|p..go to|
|00002290| 20 22 66 69 6e 22 0d 67 | 6c 6f 62 61 6c 20 70 75 | "fin".g|lobal pu|
|000022a0| 73 68 74 2c 70 75 73 68 | 70 2c 73 63 6f 72 65 0d |sht,push|p,score.|
|000022b0| 2d 2d 68 61 72 64 0d 69 | 66 20 68 61 6c 66 20 3d |--hard.i|f half =|
|000022c0| 20 30 20 74 68 65 6e 0d | 20 20 20 20 70 75 74 20 | 0 then.|    put |
|000022d0| 69 6e 74 65 67 65 72 28 | 32 30 30 30 30 20 2b 20 |integer(|20000 + |
|000022e0| 73 63 6f 72 65 29 20 69 | 6e 74 6f 20 67 65 74 0d |score) i|nto get.|
|000022f0| 65 6c 73 65 0d 20 20 20 | 20 70 75 74 20 69 6e 74 |else.   | put int|
|00002300| 65 67 65 72 28 33 30 30 | 30 20 2b 20 73 63 6f 72 |eger(300|0 + scor|
|00002310| 65 29 20 69 6e 74 6f 20 | 67 65 74 0d 65 6e 64 20 |e) into |get.end |
|00002320| 69 66 0d 0d 70 75 74 20 | 73 74 72 69 6e 67 28 67 |if..put |string(g|
|00002330| 65 74 29 20 69 6e 74 6f | 20 73 63 6f 72 65 0d 73 |et) into| score.s|
|00002340| 65 74 20 74 68 65 20 74 | 65 78 74 20 6f 66 20 63 |et the t|ext of c|
|00002350| 61 73 74 20 22 73 63 6f | 72 65 22 20 3d 20 73 63 |ast "sco|re" = sc|
|00002360| 6f 72 65 0d 0d 70 75 74 | 20 30 20 69 6e 74 6f 20 |ore..put| 0 into |
|00002370| 70 75 73 68 74 0d 70 75 | 74 20 22 22 20 69 6e 74 |pusht.pu|t "" int|
|00002380| 6f 20 70 75 73 68 70 0d | 0d 67 6f 20 74 6f 20 22 |o pushp.|.go to "|
|00002390| 66 69 6e 22 0d 0d 2d 2d | 89 45 82 aa 90 b3 89 f0 |fin"..--|.E......|
|000023a0| 0d 6a 75 64 67 65 28 41 | 31 33 2c 22 72 69 67 68 |.judge(A|13,"righ|
|000023b0| 74 22 2c 22 65 32 22 29 | 0d 0d 2d 2d 8d b6 82 aa |t","e2")|..--....|
|000023c0| 90 b3 89 f0 0d 6a 75 64 | 67 65 28 41 31 34 2c 22 |.....jud|ge(A14,"|
|000023d0| 6c 65 66 74 22 2c 22 65 | 33 22 29 67 6c 6f 62 61 |left","e|3")globa|
|000023e0| 6c 20 70 75 73 68 70 0d | 0d 69 66 20 28 74 68 65 |l pushp.|.if (the|
|000023f0| 20 6d 6f 76 69 65 74 69 | 6d 65 20 6f 66 20 73 70 | movieti|me of sp|
|00002400| 72 69 74 65 20 38 20 3c | 20 74 68 65 20 64 75 72 |rite 8 <| the dur|
|00002410| 61 74 69 6f 6e 20 6f 66 | 20 63 61 73 74 20 41 31 |ation of| cast A1|
|00002420| 35 29 20 61 6e 64 20 28 | 70 75 73 68 70 20 3d 20 |5) and (|pushp = |
|00002430| 22 22 29 20 74 68 65 6e | 0d 20 20 20 20 67 6f 20 |"") then|.    go |
|00002440| 74 6f 20 66 72 61 6d 65 | 20 32 38 0d 65 6e 64 20 |to frame| 28.end |
|00002450| 69 66 0d 0d 67 6c 6f 62 | 61 6c 20 70 75 73 68 70 |if..glob|al pushp|
|00002460| 0d 0d 69 66 20 28 74 68 | 65 20 6d 6f 76 69 65 74 |..if (th|e moviet|
|00002470| 69 6d 65 20 6f 66 20 73 | 70 72 69 74 65 20 38 20 |ime of s|prite 8 |
|00002480| 3c 20 74 68 65 20 64 75 | 72 61 74 69 6f 6e 20 6f |< the du|ration o|
|00002490| 66 20 63 61 73 74 20 41 | 31 34 29 20 61 6e 64 20 |f cast A|14) and |
|000024a0| 28 70 75 73 68 70 20 3d | 20 22 22 29 20 74 68 65 |(pushp =| "") the|
|000024b0| 6e 0d 20 20 20 20 67 6f | 20 74 6f 20 66 72 61 6d |n.    go| to fram|
|000024c0| 65 20 32 33 0d 65 6e 64 | 20 69 66 0d 0d 2d 2d 63 |e 23.end| if..--c|
|000024d0| 6c 69 63 6b 82 aa 90 b3 | 89 f0 0d 6a 75 64 67 65 |lick....|...judge|
|000024e0| 28 41 31 36 2c 22 61 6c | 6c 22 2c 22 4e 73 6c 63 |(A16,"al|l","Nslc|
|000024f0| 74 22 29 0d 67 6c 6f 62 | 61 6c 20 70 75 73 68 74 |t").glob|al pusht|
|00002500| 2c 70 75 73 68 70 2c 73 | 63 6f 72 65 2c 68 61 6c |,pushp,s|core,hal|
|00002510| 66 0d 0d 2d 2d 65 61 73 | 79 0d 69 66 20 68 61 6c |f..--eas|y.if hal|
|00002520| 66 20 3d 20 30 20 74 68 | 65 6e 0d 20 20 20 20 70 |f = 0 th|en.    p|
|00002530| 75 74 20 69 6e 74 65 67 | 65 72 28 35 30 30 30 20 |ut integ|er(5000 |
|00002540| 2b 20 73 63 6f 72 65 29 | 20 69 6e 74 6f 20 67 65 |+ score)| into ge|
|00002550| 74 0d 65 6c 73 65 0d 20 | 20 20 20 70 75 74 20 69 |t.else. |   put i|
|00002560| 6e 74 65 67 65 72 28 31 | 30 30 30 20 2b 20 73 63 |nteger(1|000 + sc|
|00002570| 6f 72 65 29 20 69 6e 74 | 6f 20 67 65 74 0d 65 6e |ore) int|o get.en|
|00002580| 64 20 69 66 0d 0d 70 75 | 74 20 73 74 72 69 6e 67 |d if..pu|t string|
|00002590| 28 67 65 74 29 20 69 6e | 74 6f 20 73 63 6f 72 65 |(get) in|to score|
|000025a0| 0d 73 65 74 20 74 68 65 | 20 74 65 78 74 20 6f 66 |.set the| text of|
|000025b0| 20 63 61 73 74 20 22 73 | 63 6f 72 65 22 20 3d 20 | cast "s|core" = |
|000025c0| 73 63 6f 72 65 0d 0d 70 | 75 74 20 30 20 69 6e 74 |score..p|ut 0 int|
|000025d0| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|000025e0| 6e 74 6f 20 70 75 73 68 | 70 0d 0d 67 6f 20 74 6f |nto push|p..go to|
|000025f0| 20 22 66 69 6e 22 0d 0d | 73 65 74 20 74 68 65 20 | "fin"..|set the |
|00002600| 74 79 70 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |type of |sprite 8|
|00002610| 20 3d 20 31 36 0d 73 65 | 74 20 74 68 65 20 6d 6f | = 16.se|t the mo|
|00002620| 76 69 65 72 61 74 65 20 | 6f 66 20 73 70 72 69 74 |vierate |of sprit|
|00002630| 65 20 38 20 3d 20 31 0d | 0d 69 66 20 74 68 65 20 |e 8 = 1.|.if the |
|00002640| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|00002650| 69 74 65 20 38 20 3c 3e | 20 74 68 65 20 64 75 72 |ite 8 <>| the dur|
|00002660| 61 74 69 6f 6e 20 6f 66 | 20 63 61 73 74 20 41 32 |ation of| cast A2|
|00002670| 38 20 74 68 65 6e 20 67 | 6f 20 74 68 65 20 66 72 |8 then g|o the fr|
|00002680| 61 6d 65 0d 0d 67 6c 6f | 62 61 6c 20 70 75 73 68 |ame..glo|bal push|
|00002690| 74 2c 70 75 73 68 70 0d | 73 65 74 20 74 68 65 20 |t,pushp.|set the |
|000026a0| 74 79 70 65 20 6f 66 20 | 73 70 72 69 74 65 20 38 |type of |sprite 8|
|000026b0| 20 3d 20 31 36 0d 73 65 | 74 20 74 68 65 20 6d 6f | = 16.se|t the mo|
|000026c0| 76 69 65 72 61 74 65 20 | 6f 66 20 73 70 72 69 74 |vierate |of sprit|
|000026d0| 65 20 38 20 3d 20 31 0d | 0d 69 66 20 74 68 65 20 |e 8 = 1.|.if the |
|000026e0| 6d 6f 76 69 65 74 69 6d | 65 20 6f 66 20 73 70 72 |movietim|e of spr|
|000026f0| 69 74 65 20 38 20 3c 20 | 74 68 65 20 64 75 72 61 |ite 8 < |the dura|
|00002700| 74 69 6f 6e 20 6f 66 20 | 63 61 73 74 20 42 31 32 |tion of |cast B12|
|00002710| 20 74 68 65 6e 0d 20 20 | 20 20 67 6f 20 74 68 65 | then.  |  go the|
|00002720| 20 66 72 61 6d 65 0d 65 | 6c 73 65 0d 20 20 20 20 | frame.e|lse.    |
|00002730| 67 6f 20 74 6f 20 22 72 | 6f 6f 64 61 22 0d 65 6e |go to "r|ooda".en|
|00002740| 64 20 69 66 0d 0d 0d 70 | 75 74 20 30 20 69 6e 74 |d if...p|ut 0 int|
|00002750| 6f 20 70 75 73 68 74 0d | 70 75 74 20 22 22 20 69 |o pusht.|put "" i|
|00002760| 6e 74 6f 20 70 75 73 68 | 70 0d                   |nto push|p.      |
+--------+-------------------------+-------------------------+--------+--------+